Profile of (eval 423)[Sub/Quote.pm:3]

Filename	(eval 423)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm:3]
Statements	Executed 16 statements in 87µs
Eval Invoked At	/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm line 3
Sibling evals	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112

Subroutines
Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
1	1	1	8µs	26µs	Type::Tiny::::__ANON__[:16]Type::Tiny::__ANON__[:16]
1	1	1	6µs	6µs	Type::Tiny::::BEGIN@9Type::Tiny::BEGIN@9
1	1	1	4µs	17µs	Type::Tiny::::BEGIN@16Type::Tiny::BEGIN@16

Call graph for these subroutines as a Graphviz dot language file.

Line	State ments	Time on line	Calls	Time in subs	Code
1					{
2	2	0s			my $_QUOTED = ${$_[1]->{"\$_QUOTED"}};
3	1	0s			my $_UNQUOTED = ${$_[1]->{"\$_UNQUOTED"}};
4					package Type::Tiny;
5					# spent 26µs (8+18) within Type::Tiny::__ANON__[(eval 423)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm:3]:16] which was called: # once (8µs+18µs) by JSON::Schema::Modern::add_vocabulary at line 177 of Sub/Defer.pm $$_UNQUOTED = sub {
6					($_QUOTED,$_UNQUOTED) if 0;
7					# BEGIN quote_sub PRELUDE
8					package Type::Tiny;
9					# spent 6µs within Type::Tiny::BEGIN@9 which was called: # once (6µs+0s) by Sub::Quote::_clean_eval at line 14 BEGIN {
10	1	1µs			$^H = 1762;
11	1	0s			${^WARNING_BITS} = "UUUUUUUUUUUUUUUUUUUU";
12	1	2µs			%^H = (
13					);
14	1	16µs	1	6µs	} # spent 6µs making 1 call to Type::Tiny::BEGIN@9
15					# END quote_sub PRELUDE
16	9	65µs	4	48µs	# spent 17µs (4+13) within Type::Tiny::BEGIN@16 which was called: # once (4µs+13µs) by Sub::Quote::_clean_eval at line 16 do { no warnings "void"; package Type::Tiny; (((do { package Type::Tiny; Types::Standard::_is_class_loaded(do { my $tmp = $_[0] }) }) && (do { local $_ = $_[0]; $_->DOES('JSON::Schema::Modern::Vocabulary') }))) or Type::Tiny::_failed_check(66, "__ANON__", $_[0], ); $_[0] }; }; # spent 17µs making 1 call to Type::Tiny::BEGIN@16 # spent 13µs making 1 call to warnings::unimport # spent 12µs making 1 call to JSON::Schema::Modern::Vocabulary::OpenAPI::DOES # spent 6µs making 1 call to Types::Standard::__ANON__[(eval 46)[Types/Standard.pm:48]:16]
17					}
18	1	3µs			1;
19
20					;